home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / C-Communications / (c)c13.d64 / menu (C) c13 (.txt) < prev   
Commodore BASIC  |  2007-02-04  |  2KB  |  39 lines
  1. 10 POKE53280,.:POKE53281,.
  2. 11 PRINT"[147][151]                            [212][208][213][199] ([195]) [195]13";
  3. 12 PRINT"[159][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]";
  4. 13 PRINT"[154]         [195]OMUNICATIONS ]>ISK 13         ";
  5. 14 PRINT"[146][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
  6. 20 PRINT"[150] [212]HIS IS THE MOST CURRENT VERSION OF"
  7. 21 PRINT"[129][206]OVA[212]ERM, V9.4.  [212]HE THREE MAIN FILES ON";
  8. 22 PRINT"THIS DISK ARE  [195][207][205][208][193][195][212][197][196].  [212]O UN-COMPACT";
  9. 23 PRINT"[149]THEM YOU WILL NEED TWO BLANK DISK SIDES,";
  10. 24 PRINT"THEN JUST LOAD AND RUN EACH OF THE THREE";
  11. 25 PRINT"[129]FILES AND INSERT YOUR BLANK DISK."
  12. 26 PRINT"[150] [207]NLY THE FIST TWO WILL FIT ON ONE SIDE!";
  13. 27 PRINT"[129][212]HE THIRD IS THE [164]DOCUMENTATION[164] AND ARE";
  14. 28 PRINT"BETTER OFF KEPT SEPARATE."
  15. 30 PRINTSPC(11)"[149]1.[206]OVA9.4.SFX"
  16. 31 PRINTSPC(11)"2.[206]OVA9.4.SFX"
  17. 32 PRINTSPC(11)"[129]3.[206]OVA9.4.SFX"
  18. 33 PRINT"[150] [202]UST LOAD AND RUN THE FIRST FILE AND IT";
  19. 34 PRINT"[129]WILL BOOT,  THERE IS A DOCUMENT PRINTING";
  20. 35 PRINT"MODULE IN IT, THAT WILL TAKE CARE OF THE[149]REST."
  21. 36 PRINT"[151]             ]-[IT ANY /<EY..          [157][148] ";:POKE198,.:GOSUB2000
  22. 40 PRINT"[147][151]                            [212][208][213][199] ([195]) [195]13";
  23. 41 PRINT"[159][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]";
  24. 42 PRINT"[154]         [195]OMUNICATIONS ]>ISK 13         ";
  25. 43 PRINT"[146][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
  26. 44 PRINT"[150]  [212]HE REST OF THE FILES ON THIS DISK ARE";
  27. 45 PRINT"[129]COMMON TEXT [211][197][209] FILES THAT HAVE SOME [194][194][211]";
  28. 46 PRINT"NUMBERZ YOU ARE FREE TO CALL..
  29. 47 [153]"VERIFY      ]-[AVE FUN!
  30. 49 POKE198,.
  31. 50 PRINT"[151]             ]-[IT ANY /<EY..          [157][148] ";:GOSUB3000
  32. 1999 RUN
  33. 2000 FORX=0TO15:POKE646,X:PRINT"[173][192][192][192][192][192][192][179] [206]OVA[212]ERM 9.4 [171][192][192][192][192][192][192][192][192][189]"
  34. 2001 IFPEEK(198)THENRETURN
  35. 2002 NEXTX:GOTO2000
  36. 3000 FORY=0TO15:POKE646,Y:PRINT"[173][192][192][192][192][192][192][179] ODDZ AND ENDZ [171][192][192][192][192][192][192][192][189]"
  37. 3001 IFPEEK(198)THEN RETURN
  38. 3002 NEXTY:GOTO3000
  39.